home *** CD-ROM | disk | FTP | other *** search
/ Chip 2002 July / 07_02.iso / software / xq-xsetup / files / setup.exe / {app} / plugins / XQ Win2K Taskbar Icon Size.xpl < prev    next >
Text File  |  2002-03-30  |  2KB  |  58 lines
  1. "FILE"="Xteq Systems X-Setup Plugin 5.0"
  2. "TYPE"="1"
  3. "COUNT"="1"
  4. "UIPATH"="Appearance\Taskbar"
  5. "NAME"="Taskbar Iconisizing"
  6. "LANGUAGE"="VBScript"
  7. "VERSION"="1.10"
  8. "OSVERSION"="001111"
  9. "TEXT 1"="Size:"
  10. "DESCRIPTION 1"="If you have many open programs, they may clutter your taskbar too much. With this plug-in, you can reduce the size each entry needs inside the taskbar."
  11. "DESCRIPTION 2"="Just enter the size, how big the items in your taskbar should be. A good value is "-285" which works for most computers and only shows the icons of the running programs (no text) but depending on your computer, you might even need to decrease this value (e.g. "-1000"). You must restart Windows for this change to take effect."
  12. "DESCRIPTION 3"="Genereally, you should adjust this value to match your Taskbar size (trial and error may be necessary):"
  13. "DESCRIPTION 4"="Taskbar size in pixel: 17   This value: -270"
  14. "DESCRIPTION 5"="Taskbar size in pixel: 18   This value: -285"
  15. "DESCRIPTION 6"="Taskbar size in pixel: 19   This value: -300"
  16. "DESCRIPTION 7"="Taskbar size in pixel: 20   This value: -315"
  17. "DESCRIPTION 8"="Taskbar size in pixel: 21   This value: -335"
  18. "DESCRIPTION 9"="The Taskbar size can be changed from: Control Panel -> Display -> Appearance -> Item: -> Active Title Bar -> push the up or down arrows and peek at the Size: box until it looks to your liking -> click OK."
  19. "DESCRIPTION 10"="To restore the original size, just clear the field."
  20. "COMMENT 1"="Thanks to Zeppelin [zeppelin_68@hotmail.com] for this idea and the link to http://www.regxplor.com/tweak17.html which provided the technical information on how to perform this tweak."
  21. "COMMENT 2"="Thanks to AXCEL216 (http://members.aol.com/axcel216/newtip22.htm#FTB) for the detailed description."
  22. "AUTHOR"="Xteq Systems (CptSiskoX)"
  23. "COPYRIGHT"="Copyright ⌐ Xteq Systems - All Rights Reserved"
  24. "CONTACTURL"="http://www.xteq.com/"
  25.  
  26.  
  27. sPath="HKCU\Control Panel\Desktop\WindowMetrics\MinWidth"
  28.  
  29. Sub Plugin_Initialize 
  30.  i=RegReadValue(sPath)
  31.  Call SetUIElement(1,i) 
  32. End Sub
  33.  
  34. Sub Plugin_Apply(ElementIndex,ElementSubIndex)
  35.  i=GetUIElement(1)
  36.  if len(i)=0 then
  37.     if RegValueExists(sPath) then
  38.        Call RegDeleteValue(sPath)
  39.        Call Restart()
  40.     end if
  41.  else
  42.     if IsNumeric(i) then
  43.        Call RegWriteValue(sPath,i,1)
  44.        Call Restart()
  45.     else
  46.        Call MsgError("Please enter a numeric value!")
  47.    end if
  48.  end if
  49.  
  50. End Sub
  51.  
  52.  
  53. Sub Plugin_Terminate 
  54. End Sub
  55.  
  56.  
  57.  
  58.